package com.flyiu.data.idempotent.handler;

import static com.flyiu.data.idempotent.handler.IdempotentHandler.getIdempotentKey;

import java.lang.reflect.Type;
import java.util.ArrayList;
import java.util.List;
import java.util.Map;
import java.util.concurrent.ConcurrentHashMap;
import java.util.stream.Collectors;

import org.apache.commons.lang3.StringUtils;
import org.aspectj.lang.ProceedingJoinPoint;
import org.aspectj.lang.reflect.MethodSignature;
import org.springframework.stereotype.Component;

import com.flyiu.data.idempotent.annotation.Idempotent;
import com.flyiu.data.idempotent.model.DefaultIdempotentEntity;
import com.flyiu.foundational.util.SpringUtils;

/**
 * 
 * <p>幂等执行器
 * </p>
 *
 * @author flyiu@flyiu.com
 * @version $Id: InempotentInvoke.java, v 0.1 2018年6月30日 上午11:39:05 flyiu Exp $
 */
@Component
public class InempotentInvoke {

    @SuppressWarnings("rawtypes")
    private static final Map<Idempotent, List<IdempotentHandler>> idemhandlerMap = new ConcurrentHashMap<>();

    /**
     * 获取所有幂等执行器
     * 
     * @param handlers
     * @return
     */
    @SuppressWarnings("rawtypes")
    private List<IdempotentHandler> parseHandlers(Class<? extends IdempotentHandler>[] handlers) {
        List<IdempotentHandler> list = new ArrayList<>();
        for (Class<? extends IdempotentHandler> handler : handlers) {
            IdempotentHandler idempotentHandler = SpringUtils.getBean(handler);
            list.add(idempotentHandler);
        }
        return list;
    }

    @SuppressWarnings("rawtypes")
    public void invokeWhileEnd(Object response, Idempotent idempotent) {
        List<IdempotentHandler> idempotentHandlers = parseHandlers(idempotent.idempotentHandler());
        idempotentHandlers.forEach(action -> action.afterResponse(response));
    }

    /**
     * 幂等征用尝试
     * 
     * @param idempotentParam
     * @param idempotentParam
     * @return true:征用成功，false:征用失败
     */
    @SuppressWarnings({ "rawtypes", "unchecked" })
    private boolean tryAcquire(List<IdempotentHandler> idempotentHandlers,DefaultIdempotentEntity idempotentEntity) {
        for (IdempotentHandler idempotentHandler : idempotentHandlers) {
            if (!idempotentHandler.tryAcquire(idempotentEntity)) {
                return false;
            }
        }
        return true;
    }

    /**
     * 进行幂等查询
     * 
     * @param idempotentHandlers
     * @param idempotentEntity
     * @param type 返回类型
     * @return
     */
    @SuppressWarnings("rawtypes")
    private Object triggerBuildOldResponse(List<IdempotentHandler> idempotentHandlers, DefaultIdempotentEntity idempotentEntity,Type type) {
        for (IdempotentHandler<?> idempotentHandler : idempotentHandlers) {
            Object response = idempotentHandler.buildDuplicateResponse(idempotentEntity,type);
            if (response != null) {
                return response;
            }
        }
        return null;
    }

    /**
     * 获取幂等处理器-优先通过缓存获取
     * @param idempotent
     * @return
     */
    @SuppressWarnings({ "rawtypes" })
    private List<IdempotentHandler> getIdemPotentHandler(Idempotent idempotent) {
        return idemhandlerMap.computeIfAbsent(idempotent, key -> {
            Class<? extends IdempotentHandler>[] handlers = idempotent.idempotentHandler();
            List<IdempotentHandler> idempotentHandlers = parseHandlers(handlers);
            return idempotentHandlers;
        });
    }

    @SuppressWarnings("rawtypes")
    public Object invoke(ProceedingJoinPoint joinPoint, Idempotent idempotent) throws Throwable {
        MethodSignature signature = (MethodSignature) joinPoint.getSignature();
        List<IdempotentHandler> idempotentHandlers = getIdemPotentHandler(idempotent);
        //获取幂等key
        DefaultIdempotentEntity idempotentEntity = getIdempotentKey(joinPoint.getArgs(), idempotent, signature);

        if (!tryAcquire(idempotentHandlers, idempotentEntity)) {
            return triggerBuildOldResponse(idempotentHandlers,idempotentEntity,signature.getMethod().getGenericReturnType());
        }

        // 调用处理器before方法
        List<Object> logObjects = idempotentHandlers.stream().map(handler -> handler.before(joinPoint.getArgs(), idempotentEntity.getHash())).collect(Collectors.toList());

        Object retval = null;
        try {
            retval = joinPoint.proceed();
            // 调用处理器success方法
            for (int i = 0; i < idempotentHandlers.size(); i++) {
                IdempotentHandler handler = idempotentHandlers.get(i);
                handler.success(logObjects.get(i), retval);
            }
        } catch (Exception e) {
            for (int i = 0; i < idempotentHandlers.size(); i++) {
                IdempotentHandler handler = idempotentHandlers.get(i);
                handler.failure(logObjects.get(i), e, joinPoint);
            }
            throw e;
        }
        return retval;
    }
}
